Programmer Power Tools/Programmer Power Tools.iso/cmplngmg/cl_jun89.arc/AWK210.ARC/WORLD.AWK

AWK Script | 1988-02-25 | 117 b | 6 lines

BEGIN { FS = "\t" }
      { pop[$4] += $3 }
END   { for (name in pop)
            print name, pop[name]
      }